home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 72 / MOBICLIC 72.ISO / mac / DATA / TCHATCHE / doggy2004.cst / 00425_Script_425 < prev    next >
Text File  |  2005-02-02  |  1KB  |  48 lines
  1. -- gestion du bouton son de l'interface
  2.  
  3. property s, nomS
  4. global sonIntLangues,interlangues,laboActif
  5.  
  6. on beginSprite me
  7.   s = me.SpriteNum
  8.   sonIntLangues = 1
  9.   if sonIntLangues = 1 then
  10.     sprite(s).member = member("sonOn","doggy")
  11.   else
  12.     sprite(s).member = member("sonOff","doggy")
  13.   end if
  14.   nomS = sprite(s).member.name
  15. end
  16.  
  17. on mouseEnter me
  18.   if _movie.pauseState() then exit
  19.   if laboActif=1 then exit
  20.   if interLangues=0 then exit
  21.   _player.cursor(280)
  22.   sprite(s).member = member(nomS & "R", "doggy")
  23.   
  24. end
  25.  
  26. on mouseLeave me
  27.   if _movie.pauseState() then exit
  28.   if interLangues=0 then exit
  29.   if laboActif=1 then exit
  30.   _player.cursor(-1)
  31.   sprite(s).member = member(nomS, "doggy")
  32. end
  33.  
  34. on mouseUp me
  35.   if _movie.pauseState() then exit
  36.   if interLangues=0 then exit
  37.   if laboActif=1 then exit
  38.   case nomS of
  39.     "sonOn" : -- dΘsactiver le son
  40.       nomS = "sonOff"
  41.       sonIntLangues = 0
  42.       sprite(s).member = member("sonOff","doggy")
  43.     "sonOff" : -- activation du son
  44.       nomS = "sonOn"
  45.       sonIntLangues = 1
  46.       sprite(s).member = member("sonOn","doggy")
  47.   end case
  48. end